home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / tftp.inc < prev    next >
Text File  |  2005-03-31  |  3KB  |  113 lines
  1. #
  2. #
  3. # This NASL script was written by Martin O'Neal of Corsaire 
  4. # (http://www.corsaire.com)
  5. # 
  6. # The script provides basic tftp functionality for use in other scripts...
  7. #
  8. # DISCLAIMER
  9. # The information contained within this script is supplied "as-is" with 
  10. # no warranties or guarantees of fitness of use or otherwise. Corsaire 
  11. # accepts no responsibility for any damage caused by the use or misuse of 
  12. # this information.
  13. #
  14. # GPLv2
  15. # 
  16.  
  17.  
  18.  
  19.  
  20. ############## declarations ################
  21.  
  22.  
  23. # declare function
  24. function tftp_get(port,path)
  25. {
  26.     # initialise variables
  27.     local_var request_data;
  28.     local_var request_ip;
  29.     local_var request_udp;
  30.     local_var response_udp;
  31.     local_var response_data;
  32.     local_var filter;
  33.     local_var source_port;
  34.     local_var destination_port;
  35.     source_port=23793+int((rand()%6157));
  36.     destination_port=port;
  37.         
  38.     # create request
  39.     request_data=raw_string(0x00,0x01)+path+raw_string(0x00)+'octet'+raw_string(0x00);
  40.     request_ip=forge_ip_packet(ip_hl:5,ip_v:4,ip_tos:0,ip_len:20,ip_id:rand(),ip_off:0,ip_ttl:64,ip_p:IPPROTO_UDP,ip_src:this_host());
  41.     request_udp=forge_udp_packet(ip:request_ip,uh_sport:source_port,uh_dport:destination_port,uh_ulen:8+strlen(request_data),data:request_data);
  42.  
  43.     # create filter
  44.     filter='udp and dst port '+source_port+' and src host '+get_host_ip();
  45.  
  46.     # send packet
  47.     response_udp=send_packet(request_udp,pcap_active:TRUE,pcap_filter:filter);    
  48.  
  49.     # check if response received
  50.     if(response_udp)
  51.     {
  52.         # retrieve udp data
  53.         response_data=get_udp_element(udp:response_udp,element:"data");
  54.         
  55.         # check if udp data is valid positive tftp data response
  56.         if(ord(response_data[0])==0x00 && ord(response_data[1])==0x03 && ord(response_data[2])==0x00 && ord(response_data[3])==0x01)
  57.         {
  58.             # remove tftp protocol header from data
  59.             response_data=substr(response_data,4);
  60.             
  61.             return(response_data);
  62.         }
  63.     }
  64.     
  65.     return;
  66. }
  67.  
  68.  
  69.  
  70. # declare function
  71. function tftp_put(port,path)
  72. {
  73.     # initialise variables
  74.     local_var request_data;
  75.     local_var request_ip;
  76.     local_var request_udp;
  77.     local_var response_udp;
  78.     local_var response_data;
  79.     local_var filter;
  80.     local_var source_port;
  81.     local_var destination_port;
  82.     source_port=32288+int((rand()%7354));
  83.     destination_port=port;
  84.         
  85.     # create request
  86.     request_data=raw_string(0x00,0x02)+path+raw_string(0x00)+'octet'+raw_string(0x00);
  87.     request_ip=forge_ip_packet(ip_hl:5,ip_v:4,ip_tos:0,ip_len:20,ip_id:rand(),ip_off:0,ip_ttl:64,ip_p:IPPROTO_UDP,ip_src:this_host());
  88.     request_udp=forge_udp_packet(ip:request_ip,uh_sport:source_port,uh_dport:destination_port,uh_ulen:8+strlen(request_data),data:request_data);
  89.  
  90.     # create filter
  91.     filter='udp and dst port '+source_port+' and src host '+get_host_ip();
  92.  
  93.     # send packet
  94.     response_udp=send_packet(request_udp,pcap_active:TRUE,pcap_filter:filter);    
  95.  
  96.     # check if response received
  97.     if(response_udp)
  98.     {
  99.         # retrieve udp data
  100.         response_data=get_udp_element(udp:response_udp,element:"data");
  101.         
  102.         # check if udp data is valid positive tftp data response
  103.         if(ord(response_data[0])==0x00 && ord(response_data[1])==0x04 && ord(response_data[2])==0x00 && ord(response_data[3])==0x00)
  104.         {
  105.             return(TRUE);
  106.         }
  107.     }
  108.     
  109.     return;
  110. }
  111.  
  112.  
  113.